home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 247
/
247.d81
/
e.keyboard buff
< prev
next >
Wrap
Text File
|
2022-08-26
|
815b
|
41 lines
u PRINT THIS
KEYBOARD BUFFER
---------------
198: Keystrokes in Buffer
631-640: Buffer
Dynamic Keyboard
To LOAD and RUN a BASIC program
from another BASIC program...
10 D=PEEK(186): REM GET DEVICE
20 A$="FILENAME"
30 PRINT"<clrscr><dn><dn><dn>";
31 PRINT"LOADA$,D"
40 PRINT"<dn><dn><dn><dn>";
41 PRINT"RUN<hm>"
50 POKE198,2
51 POKE631,13
52 POKE632,13
60 END
After printing the commands to the
screen and positioning the cursor over
the first command, we put 2 keystrokes
in 198, then 13 in 631 and 632
(<RETURN> key). When the program ends,
the two <RETURN>s are executed,
causing the LOAD and RUN to occur.
Note: We can put the filename in a
string variable and not have to fool
with the double-quote marks on the
screen.